home *** CD-ROM | disk | FTP | other *** search
/ Designer's Club 1998 July / Designer's Club 1998 July.iso / pc / IDEASRC / BUGFREE.DIR / 00088.ls < prev    next >
Encoding:
Text File  |  1998-06-09  |  176 b   |  12 lines
  1. on exitFrame
  2.   if soundBusy(1) then
  3.     go(the frame)
  4.   else
  5.     startTimer()
  6.     repeat while the timer < 60
  7.       go(the frame)
  8.     end repeat
  9.     go(1, "main")
  10.   end if
  11. end
  12.